% TEST_ID: LANG-EXPAND-0029
% CATEGORY: language/array-ops/ops
% 测试 ./ 运算符

function test_rdivide
    A = [1, 2; 3, 4];
    B = 2 * ones(2, 2);
    C = A ./ B;
    assert(isequal(C, [0.5 1; 1.5 2]));

    A = [1, 2; 3, 4];
    B = [5  6];
    C = A ./ B;
    assert(isequal(C, [0.2 1/3; 0.6 2/3]));

    A = [1, 2; 3, 4];
    B = [5];
    C = A ./ B;
    assert(isequal(C, [0.2 0.4; 0.6 0.8]));
end


